%Plot Beta
for i = 1:k
    temp = betaShrinkage_Graph(:,:,i);
    plot(datam,temp(:,2),'-','LineWidth',1.3)
    hold on
    legend(Stockname(i,:))
end
set(gcf,'Color',[0.878 0.875 0.855 ])
% title('\bf Distribution of Estimation Beta ','FontSize',12)
legend('on')
axis xy
grid on
set(gca,'FontSize',8)
[n2,m2]=size(betaOLS_Graph(:,2))
date = datenum(Date(end,:));
axlab=date-n2
datan = x2mdate(axlab,0)
axlabdes=datestr(datan)
dateaxis('x', 2)
xlabel('\bf Time ')
ylabel('\bfBeta') 
